Fall and Catch Deluxe
TI-83/+ compatible
Version 1.0

1. Authors
2. Objective
3. Source Code






1. -Authors-

	-Inital Programming started by Jake Scott (heyjas08@hotmail.com)
	-Programming redone and completed by TIFreak software Author Daniel Thorneycroft (tifreak8x@hotmail.com)

	Any bugs found can be reported to Daniel or Jake and will be fixed quickly.




2. -Objective-

	-The Objective is pretty simple, you catch a falling object. But the difference is, you get to choose how the object falls, whether up or down. You have to collect 30 points to get out of level one, and the points double every level. You start with 2 misses allowed, and every level you continue on with, you get one more chance. You can press up or down (depending on which game you are playing) to speed up the object also. It stops one line from where the 'basket' is, so dont write to me and tell me it is a bug!!


3. -Source Code-

	*note -This Version for TI-83+ only. If you try it on the TI-83, it will error out on the 	title screen. Check ticalc.org in the TI-83 BASIC GAMES for TI-83 version.
	**note -If you have trouble finding the small letters, look at the yellow letters on the 	keypads or in the [VARS], 5.STATISTICS, where you will find several small letters.

Legend:
	/>=/ = Greater than or equal to
	/<=/ = Less than or equal to
	/->/ = [sto] key
	/n=/ = not equals
	A = Points scored
	B = Misses
	C = How far the object is up or down
	E = Basket position
	F = Amount of loops until object moves
	G = getKey
	H = If the object reaches the last line
	I = Which way the object moves
	J = How fast the object moves
	K = Whether the object is moving up or down
	L = Where the object starts
	M = Maximum amount of misses
	P = Level number
	Q = 
	R = Basket-object position
	S = Amount of points needed to level up
	T = Falling object
	W = My game engine
	Z = Bonus added
	Str8 = Which object is falling  (Found in [VARS], then press [7]
	and = All 'and' statements are found by pressing [2nd] and [math], then [>]

prgm FACD    -Title screen and select fall program-

ClrDraw
1/->/W
0/->/A
0/->/B
0/->/F
1/->/P
30/->/S
2/->/M
.2/->/J
Text(1,25,"FaLL and CatcH
Text(9,19,"DeLuXe 83 editiOn
Text(29,25,"1.FALL UP
Text(38,25,"2.FALL DN
Text(47,25,"3.CREDITS
Text(56,25,"4.EXIT GM
While W=1
getKey/->/G
If G=82:Then:ClrDraw:Stop:End
If G=94:Then:ClrHome:Disp "GAME BY: D. THOREYCROFT","","STARTED BY:","JAKE SCOTT":Pause :ClrHome:DispGraph:End
If G=92:Then:-1/->/I:1/->/K:8/->/L:1/->/N:1/->/H
prgmA
End
If G=93:Then:1/->/I:2/->/K:1/->/L:8/->/N:8/->/H
prgmA
End
End




prgm A    -Actual gameplay engine-
ClrHome
Disp "LEVEL 1":Pause:ClrHome
randInt(2,15)/->/R
randInt(1,6)/->/T
L/->/C
While W=1
getKey/->/G
Output(3,2,"MISS:
Output(4,2,"SCOR:
Output(3,10,B
Output(4,10,A
If K=1:Then:Output(1,E,"n":End
If K=2:Then:Output(8,E,"U":End
If T=1:Then:"*"/->/Str8:End
If T=2:Then:"(A small block found at the end of the [catalog] menu, 25th from the bottom)"/->/Str8:End
If T=3:Then:"+"/->/Str8:End
If T=4:Then:"^"/->/Str8:End
If T=5:Then:"(24th object from bottom of [catalog] menu)"/->/Str8:End
If T=6:Then:"(37th object from bottom of [catalog] menu)"/->/Str8:End
Output(C,R,Str8
.1+F/->/F
If F=J:Then:0/->/F:Output(C,R," ":C+I/->/C:End
If G=25 and C>1 and K=1:Then:Output(C,R," ":C+I/->/C:End
If G=34 and C<7 and K=2:Then:Output(C,R," ":C+I/->/C:End
If G=24 and E>1:Then:Output(N,E," ":E-1/->/E:End
If G=26 and E<16:Then:Output(N,E," ":E+1/->/E:End
If G=22:Then:Output(1,1," ":Stop:End
If C=H and R=E:Then:A+5/->/A:L/->/C:randInt(2,15)/->/R:randInt(1,6)/->/T:End
If C=H and R/n=/E:Then:B+1/->/B:L/->/C:randInt(2,15)/->/R:randInt(1,6)/->/T:End
If B=M:Then:ClrHome:Disp "YOU SUCK!":Pause :ClrHome:Output(1,1," ":Stop:End
If A=S:Then:ClrHome:P+1/->/P:Q+1/->/Q:A*2/->/S
If B=0:Then:15/->/Z:End
If B=1:Then:10/->/Z:End
If B=2:Then:5/->/Z:End
If B/>=/3:Then:0/->/Z:End
M+1/->/M
Output(2,2,"MISS:
Output(2,8,B
Output(3,2,"BONUS:
Output(3,8,Z
Output(4,2,"SCORE:
Output(4,8,A
Output(6,2,"LEVEL:
Output(6,8,P
Output(8,2,"PRESS ENTER
Z+A/->/A
0/->/B
Pause
ClrHome
End
End